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COPYRIGHT (c) 1978, 1980, 1982, 1984 BY 
DIGITAL FQUIPRENT CORPORATION, MAYNARD, MASSACHUSETTS. 
ALL RIGHTS RESERVED 


OFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND gd 
N ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE 
ION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHE 
P 


THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE 
ae pokat ihe NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT 


DIGITAL ASSUMES NO RESPONS att he 
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SOFTWARE ON EQUIPMENT WHICH 


Y FOR THE USE OR _" OF ITS 
NOT SUPPLIED BY DIGITAL 
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FACILITY: FI1ACP STRUCTURE LEVEL 1 
ABSTRACT: 


THIS ROUTINE REQUEUES THE INDICATED I/O PACKET TO THE DEVICE 
DRIVER FOR WHICH IT WAS ORIGINALLY INTENDED. 


ENVIRONMENT : 
STARLET OPERATING SYSTEM, INCLUDING PRIVILEGED he a? 


AND INTERNAL EXEC ROUTINES. THIS ROUTINE MUST BE CA 
KERNEL MODE. 
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AUTHOR: ANDREW C. GOLDSTEIN 14-MAR-78 10:43 
MODIFIED BY: 
v03-001 mg nt Robert L. Rappaport 11-Mar-1983 


low for segmentation of Logical 1/0 (and Virtual) 
based on the UCBSL_MAXBCNT field. 


; EQUATED SYMBOLS: 
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FUNCTIONAL DESCRIPTION: 


THIS sy He et ate THE INDICATED I/O PACKET TO THE DEVICE | 
DRIVER FOR WHICH IT WAS ORIGINALLY INTENDED. IT TRANSLATES THE 
LBN INTO THE Fenner ine PHYSICAL BLOCK N ae a CONVERTS THE 
1/0 FUNCTION CODE INTO THE APPROPRIATE PHYSICAL F ON. 

THE NUMBER OF UNMAPPED BLOCKS IS DEDUCTED FROM THE “BYTE COUNT. 


CALLING SEQUENCE: 
CALL REQUEVE_REQ (ARG1, ARG2, ARG3) | 


INPUT PARAMETERS: 
ARG): ADDRESS OF 1/0 PACKET 
ARG2: STARTING LBN OF TRANSFER 
ARGS: NUMBER OF BLOCKS UNMAPPED 


IMPLICIT INPUTS: 
CURRENT_UCB: ADDRESS OF REQUEST UCB 
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OOQWQCCOCCOOCOCOOOCOOOOoooOo 


6 
8 
85 
53 
1 
4g 
7% 
fs 
f 
§ 
$1 
Hy 
Be 
86 
0000 87 : OUTPUT PARAMETERS: 
$000 «88 eg 
0000 90 : IMPLICIT OUTPUTS: | 
9000 31 NONE 
0000 38 ROUTINE VALUE: 
900098 oe 
0000 96: SIDE EFFECTS: 
0000 «=«97 REQUEST QUEUED TO UCB 
0000 =s«98 
$009 100° 
00000000 101 .PSECT $CODE$,NOWRT,LONG 
944 198 REQUEUE_REQ: : 
003¢ 0000 104 . WORD amcR2 R3,R4,R5> : SAVE REGISTERS 
53 04 ,AC D0 9002 = 105 MOVL KETC AP) «fs ; GET PACKET ADDRESS 
55 0000'CF p 006 196 MOVL Un CURR ENT : GET UCB ADDRESS | 
50° OC AC 09 0 10 ASHL #9 URRAPPED SAPD RO : GET BYTE COUNT OF UNMAPPED BLOCKS | 
18 13 001 108 BEQL : BRANCH IF ALL MAPPED - | 
32 AS C 91 1 SUBL 3 ("Ths BCNT(R3) + AND SUBTRACT FROM TRANSFER tOUN T | 
32 A3 9 Olre BF OC 1 110 ADDL # IRPSL_BCNT(R3) : ROUND BYTE COUNT TO NEXT BLOCK BOUNDARY 
32 A irr F AA OO1E 111 BICW ‘ IRPS$L-BCNT(R ; IN CASE FULL BYTE COUNT CONTAINS A PARTIAL | 
50 0B4 C5 9 4 We 10$: MOVL asi _MAXBENT(R5) ,RO ; RO = 0 or Max. permissible BCN 
0s 1 9 11 NEQ 3 ; NEQ implies Max. permissible BCNT in RO. 
50 FEOO 8 3¢ 11% aes MOVZWL #512*127,R0 : If 0, use default Max. permissible. | 
32.03 50 01 6 116 "  CMPL R0 IRP$L_BCNT(R3) : See if BCNT too Large. | 
of 18 4 11 BGEQ ; GEQ implies we are 
32 Ad 0 00 00 . BY 308: MOVL RO, IRP$L_BCNT(R3) : Else scale down to maximum allowed. | 
50 08 AC 00 A 120° MOVL  LBNCAP),RO : GET STARTING LBN | 
900000 ‘OF 8616 : on JSB seocsey TLOGPHY : CONVERT TO PHYSICAL BLOCK 
0000000'9F 16 0044 122 JSB a#EXESINSIOO + AND QUEUE TO DRIVER 
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Psect synopsis output 1 Q: 
Cross-reference output 3: : 
Assembler run totals 47 : 


BITAAP_. YPE 
CURRENT_UCB eenereee YX 02 
DIRECTORY TYPE = 00000002 
Ex nS100 geeeeeese 02 
FCB TYPE = 6° 8 0 
HEADER_TYPE = ° 
ino TYPE = 0000 
1OCSCUTLOGPHY tererene x 02 
IRPSL_BCNT = sist 
= SH0000¢ 

PIER nea = GO98880 |, 
RVT_TYP = 090000 5 
UCBSL_MAXBCNT = 00000084 
UNMAPPED = 9494548 
VCB_TYPE = 0000000 
WCB_TYPE = 00000001 

cece e meme n wee nes + 

! Psect synopsis ! 
PSECT name Allocation PSECT No. Attributes 
- ABS. 0000000 <( 0.) 00 ¢ O.) NOPIC USR CON ABS LCL NOSHR NOEXE NORD NOWRT NOVEC BYTE 
SABSS$ 0000000 <¢ .* 01 ¢ #1.) NOPIC USR CON ABS LCL NOSHR EXE RD WRT NOVEC BYTE 
SCODES 00000048 ( 75.) 02 ¢ 2.) NOPIC USR CON REL LCL NOSHR EXE RD NOWRT NOVEC LONG 

bene en enemas oor m ewer ae oe * 
H Performance indicators ; 

Phase Page faults CPU Time Elapsed Time 
Initialization Hi 00:00:00.13 00:00:00.96 
> plete 270 -00:00:07161 99005096 
Symbol table sort 0 00:00: 1:89 0 00:6 Hi 
Pass 2 41 0:00:01.37 0838 88 
Symbol table output 4 0:0 : 05 80:6 5 


Hh york ing set Limit was 1350 pages. E 

41205 bytes (81 pages) of virtual memory were used to buffer the intermediate gore. 

There were 50 pages of symbol table space aliocated to hold 870 non-local and 3 local symbols. 
30 source Lines were read in Pass 1, producing 13 object records in Pass 2. 

4 pages of virtual memory were used to define 13 macros. 
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! Macro Library statistics ! 


Pere mmr ener een weer eowacoewe ¢ 


Macro library name Macros defined 


SESRSDUAZE: SYS.OBJJLIB.MLB;1 2 
$255S0UA28: SYSLIBISTARLET. MLB; 2 4 
Terns (all Libraries) 6 


920 GETS were required to define 6 macros. 
There were no errors, warnings or information messages. 
MACRO/LIS=LIS$:REQUEU/OBJ=O0BJ$:REQUEU MSRCS$:F CPPRE/UPDATE=(ENHS:F CPPRE) +MSRC$:REQUEU/UPDATE=(ENH$:REQUEU) +EXECML$/LIB 
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